home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 8 (Internal Edition) / Apple R&P Lib Internal v8.0.iso / 5-Fonts & Software / Applications / Aldus FreeHand 3.0 / Aldus / PPDs / QMS8_461.PPD < prev    next >
Text File  |  1990-06-24  |  10KB  |  331 lines
  1. *% Adobe Systems PostScript(R) Printer Description File
  2. *% For "QMS-PS 800" version 46.1
  3. *% Produced by "GETapd.ps" version 2.0 edit 47
  4. *%
  5. *% Copyright 1988, 1989 Adobe Systems Incorporated.  All Rights Reserved.
  6. *% Permission is granted for redistribution of this file as
  7. *% long as this copyright notice is intact and the contents
  8. *% of the file is not altered in any way from its original form.
  9. *%
  10. *% The byte count of this file should be exactly 009919 or 010249
  11. *% depending on the filesystem it resides in.
  12. *%
  13. *% Date: 4/6/89
  14. *FormatVersion: "3.0"
  15. *FileVersion: "2.1"
  16. *LanguageVersion: English
  17.  
  18. *Product: "(QMS-PS 800)"
  19. *PSVersion: "(46.1) 3"
  20. *NickName: "QMS-PS 800 v46.1"
  21.  
  22. *% General Information and Defaults ===============
  23. *ColorDevice: False
  24. *FreeVM: "412988"
  25. *VariablePaperSize: False
  26. *FileSystem: False
  27. *?FileSystem: "/initializedisk where{pop(True)}{(False)} ifelse = flush"
  28. *Throughput: "8"
  29. *Password: "0"
  30. *ExitServer: "
  31.   count 0 eq {  % is the password on the stack?
  32.     true 
  33.   }{
  34.     dup    % potential password
  35.     statusdict begin checkpassword end not
  36.   } ifelse 
  37.   {  %  if no password or not valid 
  38.     (WARNING : Cannot perform the exitserver command.) = 
  39.     (Password supplied is not valid.) = 
  40.     (Please contact the author of this software.) = flush
  41.     quit
  42.   } if 
  43.   serverdict begin exitserver
  44. "
  45. *End
  46.  
  47. *Reset: "
  48.   count 0 eq {  % is the password on the stack?
  49.     true 
  50.   }{
  51.     dup    % potential password
  52.     statusdict begin checkpassword end not
  53.   } ifelse 
  54.   {  %  if no password or not valid 
  55.     (WARNING : Cannot reset printer.) = 
  56.     (Password supplied is not valid.) = 
  57.     (Please contact the author of this software.) = flush
  58.     quit
  59.   } if 
  60.   serverdict begin exitserver
  61.   systemdict /quit get exec
  62.   (WARNING : Printer Reset Failed.) = flush
  63. "
  64. *End
  65.  
  66. *DefaultResolution: 300dpi
  67. *?Resolution: "
  68. save
  69.   initgraphics
  70.   0 0 moveto currentpoint matrix defaultmatrix transform
  71.   0 72 lineto currentpoint matrix defaultmatrix transform
  72.   3 -1 roll sub dup mul
  73.   3 1 roll exch sub dup mul
  74.   add sqrt round cvi
  75.   (          ) cvs print (dpi) = flush
  76. restore
  77. "
  78. *End
  79.  
  80. *% Halftone Information ===============
  81. *ScreenFreq: "60.0"
  82. *ScreenAngle: "45.0"
  83. *DefaultScreenProc: Dot
  84. *ScreenProc Dot: "
  85. {abs exch abs 2 copy add 1 gt {1 sub dup mul exch 1 sub dup mul add 1 
  86. sub }{dup mul exch dup mul add 1 exch sub }ifelse }
  87. "
  88. *End
  89. *ScreenProc Line: "{ pop }"
  90. *ScreenProc Ellipse: "{ dup 5 mul 8 div mul exch dup mul exch add sqrt 1 exch sub }"
  91.  
  92. *DefaultTransfer: Null
  93. *Transfer Null: "{ }"
  94. *Transfer Null.Inverse: "{ 1 exch sub }"
  95. *Transfer Normalized: "
  96. {
  97. mark
  98. 1.0 1.0 .98 .9 .82 .68 .56 .48 .28 .1 .06 .0
  99. counttomark dup 3 add -1 roll exch
  100. 2 sub mul dup floor cvi
  101. dup 3 1 roll sub
  102. exch dup 
  103. 3 add index exch 2 add index dup
  104. 4 1 roll
  105. sub mul add
  106. counttomark 1 add 1 roll 
  107. cleartomark
  108. } bind"
  109. *End
  110. *Transfer Normalized.Inverse: "
  111. {
  112. mark
  113. .0 .0 .06 .1 .28 .48 .56 .68 .82 .9 .98 1.0
  114. counttomark dup 3 add -1 roll exch
  115. 2 sub mul dup floor cvi
  116. dup 3 1 roll sub
  117. exch dup 
  118. 3 add index exch 2 add index dup
  119. 4 1 roll
  120. sub mul add
  121. counttomark 1 add 1 roll 
  122. cleartomark
  123. } bind"
  124. *End
  125.  
  126. *% Paper Handling ===================
  127.  
  128. *% Use these entries to set paper size most of the time, unless there is
  129. *% specific reason to use PageRegion or PaperTray.
  130. *DefaultPageSize: Letter
  131. *PageSize Letter: "statusdict begin lettertray end"
  132. *PageSize Legal: "statusdict begin legaltray end"
  133. *PageSize A4: "statusdict begin a4tray end"
  134. *PageSize B5: "statusdict begin b5tray end"
  135. *?PageSize: "
  136.  save statusdict begin
  137.  /papersize where{ pop
  138.   12 dict begin
  139.    /lettertray (Letter) def /legaltray (Legal) def
  140.    /11x17tray (Tabloid) def /ledgertray (Ledger) def
  141.    /a3tray (A3) def /a4tray (A4) def
  142.    /a5tray (A5) def /b4tray (B4) def
  143.    /b5tray (B5) def /executivetray (Executive) def
  144.    papersize {
  145.      {load exec} stopped not{= flush}{(Unknown) = flush}ifelse
  146.    }{
  147.      {load exec} stopped not{print (.Transverse) = flush}{(Unknown) = flush}ifelse
  148.    }ifelse
  149.   end
  150.  }{
  151.   /pagetype where{pop
  152.     [(Letter)(Legal)]pagetype dup 1 gt{pop 1}if get = flush
  153.   }{
  154.     (Unknown) = flush
  155.   }ifelse
  156.  }ifelse
  157.  end restore
  158. "
  159. *End
  160.  
  161. *% These entries will set up the frame buffer. Usually used with manual feed.
  162. *DefaultPageRegion: Letter
  163. *PageRegion Letter: "letter"
  164. *PageRegion Legal: "legal"
  165. *PageRegion A4: "a4"
  166. *PageRegion B5: "b5"
  167.  
  168. *DefaultPaperTray: None
  169. *PaperTray Letter: "statusdict begin lettertray end"
  170. *PaperTray Legal: "statusdict begin legaltray end"
  171. *PaperTray A4: "statusdict begin a4tray end"
  172. *PaperTray B5: "statusdict begin b5tray end"
  173.  
  174. *% The following entries provide information about specific paper keywords.
  175. *DefaultImageableArea: Letter
  176. *ImageableArea Letter: "18 8 593 784"
  177. *ImageableArea Legal: "18 194 593 990"
  178. *ImageableArea A4: "18 18 577 824"
  179. *ImageableArea B5: "8 14 506 715"
  180. *?ImageableArea: "
  181.  save /cvp { cvi (            ) cvs print ( ) print } bind def
  182.   newpath clippath pathbbox
  183.   4 -2 roll exch 2 {ceiling cvp} repeat
  184.   exch 2 {floor cvp} repeat flush
  185.  restore
  186. "
  187. *End
  188.  
  189. *% These provide the physical dimensions of the paper (by keyword)
  190. *DefaultPaperDimension: Letter
  191. *PaperDimension Letter: "612 792"
  192. *PaperDimension Legal: "612 1008"
  193. *PaperDimension A4: "595 842"
  194. *PaperDimension B5: "516 729"
  195.  
  196. *DefaultOutputBin: Upper
  197. *DefaultInputSlot: None
  198.  
  199. *DefaultManualFeed: False
  200. *?ManualFeed: "statusdict /manualfeed get
  201.  {(True)}{(False)}ifelse = flush"
  202. *End
  203. *ManualFeed True: "statusdict begin /manualfeed true store end"
  204. *ManualFeed False: "statusdict begin /manualfeed false store end"
  205.  
  206. *DefaultOutputOrder: Reverse
  207.  
  208. *DefaultCollator: None
  209. *DefaultSorter: None
  210. *DefaultDuplex: None
  211.  
  212. *% Font Information =====================
  213.  
  214. *DefaultFont: Courier
  215. *Font Courier: Standard "(001.001)"
  216. *Font Courier-Bold: Standard "(001.001)"
  217. *Font Courier-BoldOblique: Standard "(001.001)"
  218. *Font Courier-Oblique: Standard "(001.001)"
  219. *Font Helvetica: Standard "(001.001)"
  220. *Font Helvetica-Bold: Standard "(001.001)"
  221. *Font Helvetica-BoldOblique: Standard "(001.001)"
  222. *Font Helvetica-Oblique: Standard "(001.001)"
  223. *Font Symbol: Special "(001.001)"
  224. *Font Times-Bold: Standard "(001.001)"
  225. *Font Times-BoldItalic: Standard "(001.001)"
  226. *Font Times-Italic: Standard "(001.001)"
  227. *Font Times-Roman: Standard "(001.001)"
  228. *?FontQuery: "
  229. save  2 dict begin /sv exch def
  230. /str 128 string def
  231. {
  232.   count 0 gt {
  233.     dup str cvs (/) print print (:) print    
  234.     FontDirectory exch known {(Yes)}{(No)}ifelse = flush
  235.   }{ exit } ifelse
  236. } bind loop
  237. (*) = flush
  238. sv end restore
  239. "
  240. *End
  241.  
  242. *?FontList: "
  243. FontDirectory { pop == } bind forall flush 
  244. (*) = flush
  245. "
  246. *End
  247.  
  248. *% Printer Messages (verbatim from printer):
  249. *Message: "%%[ exitserver: permanent state may be changed ]%%"
  250. *Message: "%%[ Flushing: rest of job (to end-of-file) will be ignored ]%%"
  251. *Message: "\FontName\ not found, using Courier"
  252.  
  253. *% Status (format: %%[ status: <one of these> ]%% )
  254. *Status: "idle"
  255. *Status: "busy"
  256. *Status: "waiting"
  257. *Status: "printing"
  258. *Status: "warming up"
  259. *Status: "PrinterError: timeout, clearing printer"
  260. *Status: "PrinterError: paper entry misfeed"
  261. *Status: "PrinterError: warming up"
  262. *Status: "PrinterError: no toner cartridge"
  263. *Status: "PrinterError: service call"
  264. *Status: "PrinterError: cover open"
  265. *Status: "PrinterError: resetting printer"
  266. *Status: "PrinterError: out of paper"
  267. *Status: "PrinterError: timeout"
  268. *Status: "PrinterError: manual feed timeout"
  269. *Status: "PrinterError: no paper tray"
  270.  
  271. *% Input Sources (format: %%[ status: <stat>; source: <one of these> ]%% )
  272. *Source: "serial9"
  273. *Source: "serial25"
  274. *Source: "AppleTalk"
  275. *Source: "Centronics"
  276.  
  277. *% Printer Error (format: %%[ PrinterError: <one of these> ]%%)
  278. *PrinterError: "timeout, clearing printer"
  279. *PrinterError: "paper entry misfeed"
  280. *PrinterError: "warming up"
  281. *PrinterError: "no toner cartridge"
  282. *PrinterError: "service call"
  283. *PrinterError: "cover open"
  284. *PrinterError: "resetting printer"
  285. *PrinterError: "out of paper"
  286. *PrinterError: "timeout"
  287. *PrinterError: "manual feed timeout"
  288. *PrinterError: "no paper tray"
  289.  
  290. *%DeviceAdjustMatrix: "[1 0 0 1 0 0]"
  291.  
  292. *% Color Separation Information =====================
  293.  
  294. *DefaultColorSep: ProcessBlack.60lpi.300dpi/60 lpi / 300 dpi
  295.  
  296. *InkName: ProcessBlack/Process Black
  297. *InkName: CustomColor/Custom Color
  298. *InkName: ProcessCyan/Process Cyan
  299. *InkName: ProcessMagenta/Process Magenta
  300. *InkName: ProcessYellow/Process Yellow
  301.  
  302. *% For 60 lpi / 300 dpi =====================================================
  303.  
  304. *ColorSepScreenAngle ProcessBlack.60lpi.300dpi/60 lpi / 300 dpi: "45"
  305. *ColorSepScreenAngle CustomColor.60lpi.300dpi/60 lpi / 300 dpi: "45"
  306. *ColorSepScreenAngle ProcessCyan.60lpi.300dpi/60 lpi / 300 dpi: "15"
  307. *ColorSepScreenAngle ProcessMagenta.60lpi.300dpi/60 lpi / 300 dpi: "75"
  308. *ColorSepScreenAngle ProcessYellow.60lpi.300dpi/60 lpi / 300 dpi: "0"
  309.  
  310. *ColorSepScreenFreq ProcessBlack.60lpi.300dpi/60 lpi / 300 dpi: "60"
  311. *ColorSepScreenFreq CustomColor.60lpi.300dpi/60 lpi / 300 dpi: "60"
  312. *ColorSepScreenFreq ProcessCyan.60lpi.300dpi/60 lpi / 300 dpi: "60"
  313. *ColorSepScreenFreq ProcessMagenta.60lpi.300dpi/60 lpi / 300 dpi: "60"
  314. *ColorSepScreenFreq ProcessYellow.60lpi.300dpi/60 lpi / 300 dpi: "60"
  315.  
  316. *% For 53 lpi / 300 dpi =====================================================
  317.  
  318. *ColorSepScreenAngle ProcessBlack.53lpi.300dpi/53 lpi / 300 dpi: "45.0"
  319. *ColorSepScreenAngle CustomColor.53lpi.300dpi/53 lpi / 300 dpi: "45.0"
  320. *ColorSepScreenAngle ProcessCyan.53lpi.300dpi/53 lpi / 300 dpi: "71.5651"
  321. *ColorSepScreenAngle ProcessMagenta.53lpi.300dpi/53 lpi / 300 dpi: "18.4349"
  322. *ColorSepScreenAngle ProcessYellow.53lpi.300dpi/53 lpi / 300 dpi: "0.0"
  323.  
  324. *ColorSepScreenFreq ProcessBlack.53lpi.300dpi/53 lpi / 300 dpi: "53.033"
  325. *ColorSepScreenFreq CustomColor.53lpi.300dpi/53 lpi / 300 dpi: "53.033"
  326. *ColorSepScreenFreq ProcessCyan.53lpi.300dpi/53 lpi / 300 dpi: "47.4342"
  327. *ColorSepScreenFreq ProcessMagenta.53lpi.300dpi/53 lpi / 300 dpi: "47.4342"
  328. *ColorSepScreenFreq ProcessYellow.53lpi.300dpi/53 lpi / 300 dpi: "50.0"
  329.  
  330. *% end of PPD file for QMS-PS 800
  331.